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. OPERADORES RELACIONAIS 
E MAIOR, MENOR, IGUAL 
“OPERADORES LÓGICOS 


MUITO LÓGICAS 


Os computadores são capazes de 
executar milhões de operações lógicas 
em apenas um segundo. Mas a lógica é 
também parte fundamental de qualquer 
programa. Conheça seus operadores. 


A programação BASIC utiliza três ti- 
pos de expressão: aritmética, de cadeia 
e lógica. As duas primeiras compõem a 
maior parte de qualquer programa. Po- 
rém, cabe às expressões lógicas a respon- 
sabilidade pelas decisões ao longo de um 
programa. 

A função das expressões lógicas €, 
simplesmente, verificar se algo é ''ver- 
dadeiro” ou “falso”. As palavras e sim- 
bolos usados para isso em um progra- 
ma são chamados de operadores (ou, 
ainda, conectores). 

Nas expressões lógicas empregam-se 


dois tipos de operadores: os operadores 


relacionais (que incluem simbolos ma- 
temáticos como <,> e =) e os opera- 
dores lógicos: AND, OR e NOT (incluí- 





dos na lista de comandos de qualquer 
versão BASIC). 





MAIOR, MENOR, IGUAL 


Os operadores relacionais podem ser 
usados até no mais simples dos progra- 
mas em BASIC. As comparações pos- 
síveis são: 


ADD scenes A é maior que B 
AEB ias A é menor que B 
A>=B.... A é maior ou igual a B 


... À é menor ou igual a B 
A=B....... A é igual a B 
. À não é igual a B 


Você já deve ter visto esses operado- 
res em vários programas de INPUT. 
Embora possam ser úsadas em aritmé- 
tica direta, é no uso conjunto com o 
IF... THEN que se torna mais evidente 
sua contribuição nos testes condicionais. 
Um exemplo comum: 
IF A>B THAN PRINT* 
QUE B” 


A É MAIOR 





“AND, ORE NOT 


Eh) 
JF TABELAS-VERDADE 


Neste caso, o valor de A deve ser 
maior que o de B para que o restante da 
linha seja executado. Sempre que o va- 
lor de A for menor que o de B, o pro- 
grama saltará para a próxima linha. O 
exemplo torna evidente a possibilidade 
de um salto condicional: se um conjun- 
to de valores satisfaz a condição, então 
o programa faz algo; se é um outro con- 
junto de valores que a satisfaz, então o 
programa faz outra coisa. 

O uso dos operadores relacionais não 
se limita a valores numéricos. Eles tam- 
bém podem ser empregados para com- 
parar cadeias. Contudo, isso requer cer- 
ta cautela; caso contrário, obtêm-se re- 
sultados um tanto quanto estranhos. E 
importante lembrar, em primeiro lugar, 
que a comparação sempre pára no últi- 
mo caractere da cadeia mais curta. Ou 
seja, se uma cadeia contém onze carac- 
teres e outra contém sete, somente os se- 
te primeiros da cadeia mais longã serão 
comparados com os da cadeiã mais 
curta. 

Na realidade, a comparação é feita 
com um cafactere de cada vezjida es- 





querda para a direita — e aqui se encon- 
tra a explicação para o surgimento de re- 
sultados estranhos. Numa comparação 
numérica, a afirmação 5> 10 é obvia- 
mente falsa mas, numa comparação en- 
tre cadeias, pode-se ter uma afirmação 
na forma A$>BS$. Se A$=''5" e 
B$ = *“10"*, o computador compara pri- 
meiro os caracteres à esquerda — 5 e 1. 
Em seguida pára, pois para ele não há 
mais nada a ser comparado, 

Assim, temos uma condição ''verda- 
deiro” incorreta, pois 5 é maior que 1, 
mas o computador ignorou o caractere 
que restou na cadeia mais longa. Esteja 
sempre atento a erros como este. 

Nas cadeias, as letras do alfabeto se- 
guem a seguinte ordem de comparação: 
CAM <SB"<4C"<D", e assim por 
diante. Mais uma vez, seja cauteloso, 
pois o computador não entende o signi- 
ficado dos caracteres. Na verdade, o que 
ele faz é comparar os códigos dos carac- 
teres, o que explicaremos com mais de- 
talhes num próximo artigo. Em conse- 
quência, os espaços e outros caracteres 
que não são letras tornam-se tão impor- 
tantes quanto as próprias letras, pois ca- 
da um tem seu código. Esquecer-se dis- 
so resultaria em erro, por exemplo, num 
programa que coloca cadeias em ordem 
alfabética. 

Se cada cadeia tem a mesma seqiên- 
cia de caracteres, a mais longa será con- 
siderada a maior, numericamente. Mas 





note que a cadeia mais curta é tomada 
como a maior numa expressão como 
“ABD”>''ABCD”, pois a compara- 
ção para quando encontra a primeira di- 
ferença — ou seja, quando os valores 
dos códigos de “D"' e “'C”' são compa- 
rados. A prioridade, portanto, é pare- 
cida com aquela dos dicionários ou in- 
dices, onde ''amor” vem antes de 
“amoroso” mas depois de “amargo”. 





VERDADEIRO OU FALSO 


Depois de qualquer comparação, 
obtém-se um resultado — um número 
inteiro. Este é O, se a comparação for 
falsa, e —-1 ou 1 (dependendo da má- 
quina), se for verdadeira. 

Experimente inserir no seu micro- 
computador, em modo direto (imedia- 
to), a seguinte linha: 


PRINT 6>5 , 557 


A expressão da esquerda é verdadei- 
ra e a da direita, falsa. Você verá apa- 
recer na tela, portanto, o resultado 1 (ou 
—1) e 0. 

Os resultados obtidos numa compa- 
ração podem ser usados em cálculos no 
decorrer do programa. Mas tome cuida- 
do com a divisão: qualquer tentativa de 
dividir um número por O resultaria nu- 
ma mensagem de erro. 











OPERADORES LÓGICOS 


AND, OR e NOT são operadores ló- 
gicos que auxiliam na tarefa de decisão 
do IF... THEN (página 41). Por exem- 
plo: IF (se) isto é verdadeiro AND (e) 
aquilo é verdadeiro THEN (então) faça 
alguma coisa. Os outros dois operado- 
res seriam usados da mesma maneira. 

Estes operadores — às vezes chama- 
dos de operadores booleanos (inventa- 
dos pelo matemático inglês George Boo- 
le) — podem ser empregados para com- 
parar números ou cadeias, tanto no mo- 
do direto como no modo de programa, 
e obter um '*'valor verdade” para o que 
se considera uma condição de teste mul- 
to complexa. Eles oferecem um caminho 
mais curto para o cumprimento de uma 
tarefa que envolveria um amontoado de 
IF... THEN. 


O USO DO AND 





Simplificadamente, o operador AND 
pode ser considerado como tendo o sig- 
nificado de E. Numa expressão como: 


IF V>0 AND V<100 
PRINT” PERMITIDO ” 


«à mensagem aparece na tela somente 
se V for maior que O e menor que 100. 


a E 











ES E. dat = 


a O çe 


| | 
| | 
| 
E = é -—, E q. pa o ee a mo 


= e À iq a ———— = — as a q = 





| Num programa, teriamos algo como: 


UM 


990 OKAY=1 AND MES>5 AND MES<IO 
| AND AN0>1900 AND ANO<2001 


o 


990 OKAY=-1 AND MES>5 AND MES<1 
O AND ANO>1900 AND ANO<2001 


Uma linha de programa como esta 
poderia ser empregada para vários fins 
— por exemplo, para verificar se uma 
certa data caiu no inverno, no século 

| vinte. 

Utiliza-se o AND, no caso, para co- 
mandar quatro testes. Todos devem ser 
verdadeiros para que a variável OKAY 
permaneça como verdadeira. Nesse tes- 

| te de validade, primeiramente ajusta-se 
a variável OKAY como ''verdadeira” 
(— 1, ou 1 no Sinclair e Apple). Depois, 
a condição necessária é que MES esteja 
entre 6 e 9 e que AND esteja entre 1901 
e 2000 (inclusive). 

Verifiquemos mais de perto o que 
acontece: se as condições forem total- 
mente satisfeitas, todas as expressões 
produzirão um valor verdadeiro. Em 
consequência, a linha de programa fi- 
caria assim: 





990 OKAY= 
-L AND -1 


=1 AND -1 AND -1 AND 


(nos micros da linha Sinclair e Apple se- 
ria |, em vez de —1) 


Se acrescentarmos PRINT OKAY, 
verificaremos que, de fato, o resultado 


-é —l, ou seja, verdadeiro. 





Ter — OUSODOOR 


Embora o significado de OR (tradu- 
zindo, teriamos OU) seja diferente do 
de AND, ambos podem ser considera- 
dos semelhantes em relação à maneira 
como são usados, 

Vejamos um exemplo simples, que 
emprega OR na comparação de valores 
de uma determinada variável. 

IF V=8 OR V=10 PRINT” OKAY ” 

A mensagem aparecerá na tela se o 
valor de V for 8 ou 10. 

O emprego do OR é muito útil na 
verificação da validade dos dados in- 
troduzidos no computador via coman- 
do INPUT. Se temos, por exemplo, 
um programa que pergunta pela idade, 
com certeza haverá alguém que, só por 
curiosidade, responderá —10O ou 999, 

Para contornar problemas como es- 
se, usamos a seguinte alternativa: 


10 INPUT A 
20 IF A<l OR A>120 
SEJA SENSATO ”: 


- O USO DO NOT 


O terceiro operador lógico de uso 
bastante comum é o NOT. Ele difere um 
pouco dos outros, pois age somente na 
expressão numérica ou lógica que o se- 
gue — AND e OR comparam expressões 
nos dois lados, mas NOT trabalha so- 
bre um único valor. 

Veja um exemplo do uso do NOT. 


THEN PRINT” 
GOTO 10 





IF NOT (A>10) THEN 999 

Se traduzissemos isto para uma lin- 
guagem do dia-a-dia teriamos: “se o va- 
lor de A não é maior que 10, então vá 
para a linha 999". 

A função lógica do NOT é converter 
para falsa uma condição verdadeira, ou 
vice-versa. Poderíamos utilizá-lo, por 
exemplo, como uma chave que inverte 
a condição falso/verdadeiro obtida no 
resultado de uma operação anterior. 


TABELAS - VERDADE 





Ouvimos falar de ''tabela-verdade' 
sempre que o assunto é operadores ló- 
gicos. Bem, elas são muito simples. Sua 
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função consiste em fornecer uma repre- 
sentação visual do que acontece com os 
falso/verdadeiro quando usamos AND 
e OR sobre eles. NOT não precisa de ta- 
bela, já que produz sempre o inverso. 

As tabelas podem assumir várias for- 
mas; uma típica para o AND é: 





A B Cc 

— 1 — 1 — 1 linha 1 

— 1 O O linha 2 
0) — 1 0) linha 3 
O O 0 linha 4 


Para desvendar o significado da ta- 
bela, basta interpretá-la linha por linha. 
Linha |: “Se A é verdadeiro e B é ver- 
dadeiro, então € também é verdadei- 
ro”, Linha 2: “Se A é verdadeiro e B 
é falso, então C é falso”. Linha 3: “Se 
A é falso e B é verdadeiro, então C é fal- 
so". Linha 4: “Se A e B são ambos fal- 
sos, então C é falso”. 


A tabela-verdade para o OR é: 





A B E 

— 1 — 1 — 1 linha 1 

— 1 O — 1 linha 2 
Ô -— 1 — 1 linha 3 
O O O linha 4 


Na primeira linha, lê-se: ““Se A é ver- 
dadeiro e B é verdadeiro, então € é ver- 





dadeiro"*. Nas linhas 2 e 3 lê-se: “Se A 
ou B for verdadeiro, então C é verda- 
deiro”. A linha 4 significa: “Se A e B 
são ambos falsos, então € também é 
falso” 


+ TT. 


Apresentamos aqui um programa 
que usa AND, OR e NOT. Trata-se de 
uma versão simplificada de um progra- 
ma que calcula a escala de salário cor 
reta para o candidato a um emprego. 


10 INPUT" IDADE” ; IDADE 
20 INPUT"NUMERO DE REFERENCIAS" 
“REF 

30 MAIOR1I8=(IDADE>=18) 

40 QUAL=(REF>=5) 

50 IF NOT MAIORIA AND NOT QUAL 

THEN PRINT "NAO QUALIFICADA" 

60 IF(NOT MAIORI8 AND QUAL) OR(M 
AIORIB AND NOT QUAL) THEN PRIN 
T "ESCALA 1 DE SALARIO”. 

70 IF MAIORIS AND QUAL THEN PR 
INT "ESCALA 2 DE SALARIO” 










Digamos que o candidato tenha res- 
pondido 20 para idade e 4 para nu- 
mero de referências. Isso significa que 


(IDADE > = 18) é verdadeiro, mas 
(REF> =5) é falso. A pessoa, portan- 
to, é MAIORI8 e NÃO QUALificada. 
Na linha 60, encontramos outro conjun- 
to de condições que, caso satisfeitas, se- 





leciona a primeira escala de salários. Po- 
deríamos facilmente modificar o progra- 
ma para testar mais condições, por 
exemplo: verificar se a pessoa tem mais 
de dois anos de experiência, etc. 


ES Ti 


OPERAÇÕES NUMÉRICAS 





O uso dos operadores lógicos não es- 
tá limitado somente ao IF... THEN. Eles 
também podem ser usados com alguns 
tipos de operações numéricas. Talvez 
você tenha visto esse tipo de uso em pro- 
gramas anteriores, mas ficou sem saber 
o que estava acontecendo. Na verdade, 
eles nem sempre funcionam da maneira 
óbvia, como poderiamos esperar. [en- 
te isto no modo direto: 


PRINT 375 AND 4/7 


Se você esperou que o resultado fos- 
se 422 ou até mesmo 37547, errou. Na 
verdade, temos 39 como resultado. O 
que estaria acontecendo então? Somente 
se nos aprofundarmos um pouco no 
funcionamento dos computadores pode- 
remos entender o que ocorre com O 
AND desse exemplo. 

Em primeiro lugar, as expressões (3/5 
e 47) são transformadas em números in- 



































teiros de dois bytes. Na forma binária, 
ficam assim: 


375 em binário de dois bytes: 
0000000101110111] 

47 em binários de dois bytes: 
0000000000101111 


Em seguida, o AND compara bit a 
bit todos os dezesseis bits, produzin- 
do um *'1"* somente quando, no par de 
bits comparados, ambos forem “1”. Da 
direita para a esquerda, os únicos pares 
de bits que satisfazem (produzem “*1"") 
são os de números 0,1,2 e 5. Isto resul- 
ta no número binário 0000000000100171 
que, transformado] para decimal, é 39. 
Portanto, 375 AND 47 é igual a 39. 

Agora, tente em modo direto: 


PRINT 375 OR 47 


Como obtivemos 383? Lembre-se da 
propriedade do OR: produz-se “1” 
quando, no par de bits comparados, pe- 
lo menos um dos bits for “1º”. Obser- 
vando novamente a forma binária de 
375 e 47, vemos que os pares de bits de 
número 8, 6, 5, 4, 3,2, 1 e O produzem 
“1” quando comparados pelo OR, Is- 
to resulta no binário 0000000101111111, 
que equivale ao 383 decimal. 

Com OR é possível obter o mesmo 
resultado, usando expressões diferentes. 
PRINT 375 OR 75, por exemplo, tam- 


1 | | | 
| | | | 


bém resulta em 383. Caso queira verifi- 
car, faça o seguinte: converta para bi- 
nário, compare pelo OR e converta de 
volta para decimal o resultado obtido. 

O valor -l | (armazenado como 
FFFFFFFF em hexadecimal — um ar- 
ranjo de bits onde todos valem 1) não 
se altera quando comparado pelo OR 
com qualquer outro valor. Faça uma ex- 
periência, tentando no modo direto: 
PRINT -1l OR 375 

O resultado é —l1. 

Vejamos agora uma aplicação numé- 
rica para o NOT. 
PRINT NOT 10.75, -11 

O resultado é -11 e 10. O NOT so- 
mou | ao valor e depois mudou seu si- 
nal. Note que a parte não inteira (.75) 
foi ignorada e eliminada, e que o novo 
valor pode ser estimado usando X = 
— (X + 1). Na realidade, o valor é trans- 
formado num inteiro de quatro bytes, 
com todos seus bits invertidos. 


SS é! 


Os operadores lógicos destes compu- 
tadores não fazem comparação bit a bit 
dos números e, por isso, quase nunca 
são usados em operações numéricas. 


NOT 


EXISTE LIMITE PARA O TAMANHO 
DOS NUMEROS USADOS EM AND E 
OR? 

No TRS-Color e MSX, os números 
| empregados em qualquer operação 
com AND ou OR têm que estar entre 
— 32768 e + 32767; caso contrário, 
teremos uma mensagem de erro. 

No Spectrum, Apple e TK-2000 não 
é possível usar números nas operações 
AND ou OR. 
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Chegou a hora de preencher o mundo 
ainda vazio de nossa aventura. 
Você verá aqui € como acrescantas. 


Bd pias 









































Na última seção de Programação de 
Jogos, dispúnhamos de um conjunto 
completo de posições para nossa aven- 
tura e o jogador já estava capacitado a 
explorar todas elas. As movimentações 
do aventureiro, porém, até agora não 
têm propósito, uma vez que o mundo da 
aventura está vazio. Convém, assim, Te- 
tomar o planejamento inicial e examinar 
o que se pretendia incluir em cada ponto, 

Veremos, em seguida, como adicio- 
nar ao programa as rotinas que coloca- 
rão os objetos envolvidos na aven- 
tura em seus devidos lugares. 
Outras rotinas permitirão ao 
jogador carregar objetos consi- 
go ou deixá-los de lado, Escre- 
veremos, ainda, uma rotina pa- 
ra listar um inventário de todos 
os itens utilizados — ela será a 
importante para o jogador, quando - 
ele se deparar com um problema EP 
cisar verificar exatamente a situação 

cada objeto. É. 

Use o LOAD e carregue o prograr 
usado recentemente, deixando-o pr 
to para receber as novas rotinas 


OBJETOS 


= 


A máquina precisa saber três é oisas 
sobre cada objeto da aventura: o nú 
ro de posição onde foi inicialmentel 
locado, seu nome (ou descrição € rta 3 
e, finalmente, a descrição detalhada d | 
local onde se encontra. As três inform 
ções são necessárias já que, primeiro, 6 E 
computador deverá escolher um objetos sa 
adequado a cada posição. Depois, pre-* 
cisará contar ao aventureiro que obje- 
tos estão nesta posição — mesmo que 
use uma longa descrição. E, por último, 
terá que dispor de um nome para usar 
em instruções e na lista. 

Os números de posição serão coloca- 
dos em uma matriz, O nome do objeto 
em outra, e a descrição longa em uma 
terceira. As três matrizes serão manipu- 
ladas em paralelo pelo programa — ca- 
da elemento da matriz guardará um es- 
paço equivalente de informação sobre o 
objeto: o primeiro conterá o número da 
posição, o segundo o nome do objeto e 
assim por diante. Adicione estas linhas 
ao seu programa: 
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' m LINHAS DATA E MAIS VERBOS 

ES E “PARA À LISTA DE OBJETOS EE COMO PEGAR E LARGAR OBJETOS 
en E DESCRIÇÕESCURTAS ELONGAS E COMO MOSTRAR AO JOGADOR 
É COLOCAÇÃO DOS OBJETOS “A LISTA DOS OBJETOS 

















































NAS POSIÇÕES CORRETAS QUE CARREGA 





160 REM **PREPARA MATRIZES DE 
OBJETOS** 

170 READ NB 

180 DIM B(NB): DIM BS(NB,14): 
DIM SS(NB,40) 

190 FOR I=1 TO NB: READ B(I),B 
S(I),SS(I): NEXT 1 

200 DATA 7,4,"SACO”,"HA UM SAC 
O DE BOLAS DE GUDE AQUI” 

210 DATA 14,"TIJOLO”,"TEM UM T 
IJOLO NO CHAO” 

220 DATA 24,"CORRENTE”,"HA UMA 
CORRENTE PENDURADA SOBRE O TR 
ONO” 

230 DATA 0,"REVOLVER”,"TEM UM 
E REVOLVER NO CHAO” 

- 240 DATA O,"OLHO”,"UM OLHO CRA 
- VEJADO DE BRILHANTES ESTA NO C 
— HAO” 

[250 DATA 22," LAMPADA”,"VOCE ES 
“TA DIANTE DE UMA LAMPADA” 

260 DATA 0,"COLETOR”,"DE REPEN 

TE SURGE UM COLETOR DE IMPOSTO 


50 REM **PREPARA MATRIZES DE O 
JETOS** 

70 READ NB 

30 DIM OB (NE), OBS (NB), SIS(NB) 
[90 FOR I=1 TO NB:READ OB(I),0B 
(1), SIS(I): NEXT 

DO DATA 7,4,SACO,HA UM SACO DE 
' BOLAS DE GUDE AQUI 

210 DATA 14, TIJOLO, TEM UM TIJOL 
O NO CHAO 

7 220 DATA 24,CORRENTE,HA UMA COR 
| RENTE PENDURADA SOBRE O TRONO 
"230 DATA O,REVOLVER, TEM UM REVO 
| [VER NO CHAO 

DD 240 DATA 0,0LHO,UM OLHO CRAVEJA 
DO DE BRILHANTES ESTA NO CHAO 
250 DATA 22, LAMPADA, VOCE ESTA D 
IANTE DE UMA LAMPADA 

260 DATA O, COLETOR,DE REPENTE S 
URGE UM COLETOR DE IMPOSTOS 


Cada linha entre 200 e 260 contém 
três partes dos dados referentes ao mes- 
mo objeto. A linha 200 apresenta um 
dado a mais em sua lista. O número 7 
— O primeiro do comando DATA — diz 
à máquina quantos conjuntos de dados 
| pe existem. 

e. Uma vez que o número 7 tenha sido 


AE . ==" == — — =———— « - 
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lido pela linha 170, três matrizes serão 
dimensionadas para este tamanho, pela 
linha 180. OB conterá a posição de ca- 
da objeto — um número da posição, ou 
0, se o elemento ainda não existe (é co- 
mo se fosse a tampa de um baú, que pre- 
cisasse ser aberto a cada aventura), € 
— |, se está sendo levado pelo aventu- 
reiro. OB$ conterá a descrição curta e 
SIS a descrição longa. 

A linha 190 completará a matriz com 
os dados das linhas 200 a 260. Os co- 
mandos DATA estão arrumados em 
conjuntos de três elementos: um núme- 
ro de posição, a descrição curta do ob- 
jeto e a descrição longa do objeto. 

Para usar a mesma rotina em outras 
aventuras, não é necessário fazer mui- 
tas alterações nessa estrutura, pois, ajus- 
tando a primeira parte dos dados, au- 
tomaticamente os comandos FOR... 
NEXT e as dimensões das matrizes es- 
tarão ajustados. 


"COMO POSICIONAR OS OBJETOS 


O programa contém agora todas as 
informações sobre os objetos e as posi- 
ções onde deverão ser colocados. A ro- 
tina seguinte exibe a descrição longa do 
objeto quando o jogador está no local 


adequado. 


360 REM **COLOCA CADA OBJETO E 
M SEU LUGAR** 
3/0 FOR I=1 TO NB: IF B(I)=L 


THEN PRINT SS(I) 
380 NEXT I 


TT 


360 REM**COLOCA CADA OBJETO EM 
SEU LUGAR** 

370 FOR JI=1l TO NB:IF OB(I)=L T 
HEN PRINT SIS(I) 

380 NEXT 


Neste estágio, faça uma pequena al- 
teração nas linhas 330 e 340: troque GO- 
TO 400 para GOTO 370. As linhas 370 
e 380 checam a matriz que guarda a po- 
sição do objeto. Se algum número de 
posição combinar com a posição corren- 
te — L — uma descrição curta será exi- 
bida após a descrição da posição. Essa 
rotina pode ser usada em outras aven- 
turas, sem alterações. 


| MAIS VERBOS | 


A aventura inclui objetos em diferen- 
tes posições mas, como a máquina até 
aqui não entende qualquer palavra ex- 








ceto NORTE, SUL, LESTE e OESTE, 
o pobre aventureiro não pode fazer na- 
da com eles. Imagine sua frustração ao 
se ver incapaz de pegar o tão desejado 
saquinho de bolas de gude, ou sem con- 
dições de se defender do fiscal da Re- 
ceita! Precisamos fornecer ao computa- 
dor um vocabulário de palavras que ele 
possa reconhecer, informando o que fa- 
zer com os objetos. Mais tarde, veremos 
como proceder se o jogador entrar uma 
palavra que não está no vocabulário 
programado. 

Como o programa trata todas as pa- 
lavras de direção como verbos, o melhor 
lugar para os verbos, que descrevem o 
que fazer com os objetos, é a matriz R$ 
e, para os números correspondentes, R. 

Precisaremos, no entanto, fazer algu- 
mas alterações na linha 130. Os limites 
do FOR...NEXT deverão ser mudados. 
Reescreva toda a linha ou use o editor 
da máquina para muda-la. Seja qual for 
sua escolha, a linha 130 será agora: 


130 FOR K=1 TO 19: READ AS(K), 
R(K): NEXT K 


Dalá io) 


130 FOR K=1 TO 19:READ RS(K),R( 
K) :NEXT 


Agora, adicione as linhas 140 e 145: 


140 DATA "NADAR" ,"5”," ESVAZIAR 
", "6", "ACENDER”,"7”,"DESISTIR” 
, 8", LISTAR”","9”,  MATAR"," LO” 
+ "ATIRAR”,"10”","AJUDAR”," 11” 
145 DATA "PEGAR”,"2”," APANHAR” 
"2" , "CARREGAR" ,"2”","COLOCAR”, 
"3º, "DEIXAR" ,"3”,"LARGAR”,"3”, 
"PUXAR", "4º 


TT 


140 DATA NADAR,5, ESVAZIAR, 6,ACE 
NDER, /, DESISTIR,B,LISTAR,9,MATA 
R,10,ATIRAR,10,AJUDAR,11 

145 DATA PEGAR,2,APANHAR, 2, CARR 
EGAR, 2, COLOCAR, 3, DEIXAR, 3, LARGA 
R, 3, PUXAR, 4 





A cada verbo corresponde um núme- 
ro. Verbos com o mesmo número pos- 
suem o mesmo significado e, portanto, 
o mesmo efeito. Planejamos o progra- 
ma de modo que o computador reconhe- 
ça, por exemplo, PEGAR, APANHAR 
e CARREGAR, evitando que o aventu- 
reiro gaste seu precioso tempo tentando 


descobrir qual desses verbos usar, Você 
pode facilmente adicionar suas próprias 
palavras às linhas de comando DATA: 
basta trocar o laço FOR...NEXT na li- 
nha 130 e colocar outro comando DA- 
TA após a linha 145, Você deverá fazer 
algumas alterações em outros locais do 
programa mas, nas próximas seções de 
Programação de Jogos, informaremos 
exatamente como proceder. 





SELEÇÃO DAS ROTINAS ADEQUADAS 


Depois de entrar todos os verbos na 
última rotina, o computador precisará 
de outras rotinas que o tornem capaz de 
agir conforme as instruções e de fazer 
com que o aventureiro carregue alguns 
objetos. 

A sub-rotina que começa na linha 
3010, por exemplo, define VS, N$ e 1 
(um número da matriz R que você já de- 
ve ter escrito). 

Esta pequena rotina fará com que a 
máquina seja capaz de selecionar a ro- 
tina correta, de acordo com o valor de 
| — que é o significado da entrada do 
aventureiro. 


O Spectrum não tem o comando 
ON...GOTO, usado em programas pa- 
ra outros computadores. As linhas do 
programa, portanto, têm que ser um 
pouco diferentes. 

Já temos uma matriz, G, que contém 
números de linha para as descrições de 
posição. Os números de linha necessá- 
rios às novas rotinas podem ser adicio- 
nados a esta matriz. 

Por isso, a linha 30 ficou assim: 


FOR M=1 TO 
NEXT M: NEXT 


30 FOR N=1 TO 4: 
11: READ G(M,N): 
N 


E é também pelo motivo acima que 
essa linha contém todos os números de 
linha que precisaremos (veja a explica- 
ção completa no artigo da página 270). 
70 DATA 1010,1150,1240,1310, 


1410,1460,1500,1360,1080,1550 
[53110 


Agora, adicione a rotina que solucio- 
nará a rotina correta, de acordo com o 
valor de I: 

500 REM **SELECIONA OPCAO** 
510 IF 1=0 THEN GoTo 520 

520 PRINT '"EU NAO SEI COMO "; 
VS: GOTO 370 

Se a sub-rotina de verificação de ins- 
trução que começa na linha 3010 não en- 
contrar uma combinação para V$ em 
R$, I torna-se zero e a linha 510 faz com 








que a mensagem “EU NÃO SEI CO- 
MO" surja na tela. Se I tiver qualquer 
outro valor, a linha 515 encontra o nú- 
mero de linha correto na matriz G e exe- 
cuta um GOTO. 


alelo) 


500 REM**SELECIONA OPCAO** 

505 IF I=0 THEN GOTO 520 

510 ON I GOTO 1010,1150,1240,13 
10,1410,1460,1500,1360,1080,155 
0,3110 

520 PRINT: PRINT 
O ":;V$:GOTO 370 


"EU NÃO SEI COM 


Os números após o ON...GOTO na 
linha 510 iniciam as diversas rotinas. 
Cada valor de [ é um verbo diferente ou 
um grupo de verbos. Se [=10, por 
exemplo, a rotina “MATAR” será se- 
lecionada — e, sendo o décimo número 
na linha, ela começará na linha 1550. 

Se a sub-rotina de verificação de ins- 
trução que começa na linha 3010 não en- 
contrar uma combinação de VS em RS, 
I torna-se O. Nesse caso, o ON...GOTO 
na linha 510 não terá nenhum efeito. A 
mensagem na linha 520 será exibida na 
tela. 


| COMO PEGAR OS OBJETOS 


Já temos uma rotina para quando I 
for igual a 1, o que ocorre quando o 
aventureiro dá uma ordem. Ela está en- 
tre as linhas 1010 e 1060. 

Quando 1=2, o aventureiro digitou 
uma rotina “PEGAR” — ou seja, as 
palavras PEGAR, APANHAR ou 
CARREGAR. Esta rotina, apresentada 
a seguir, permitirá ao aventureiro pegar 
e conservar consigo qualquer objeto que 
esteja na posição. 


1140 REM **PEGAR** 

1150 FOR G=1 TO NB 

1160 IF NS=BS(G, TO LEN NS) THE 
N GOTO 1190 

1170 NEXT G 

1180 PRINT N$;"7?77": GOTO 330 
1190 IF B(G)=-1l THEN PRINT "VO 
CE PEGOU”: GOTO 330 

1200 IF B(G)<>L THEN PRINT "NA 
O ESTA AQUI”: GOTO 330 

1210 PRINT “OK”: LET B(G)=-1 
1220 GOTO 330 


Dy 


1140 REM**PEGAR** 
1150 FOR G-1 TO NB 
1160 IF INSTR(O0BS(G),NS)=1 THEN 
GOTO 1190 | 








1170 NEXT 

1180 PRINT N$;"?7?7?":GoTO 330 
1190 IF OB(G)=-1 THEN PRINT "VO 
CE PEGOU”:GOTO 330 

1200 IF OB(G)<>L THEN PRINT "NA 
O ESTA AQUI” :GOTO 330 

1210 PRINT "O0K”:0B(G)=-1 

1220 GOTO 330 


1140 REM ** PEGAR ** 
1150 FOR G = 1 TO NB 


1160 IF N$ = LEFTS (OBS(G), L 
EN (NS)) THEN 1190 

1170 NEXT 

1180 PRINT N$;”" 77"; GOTO 330 
1190 IF OB(G) = - 1 THEN PRI 
NT "VOCE PEGOU”: GOTO 330 

1200 IF OB(G) < > L THEN PRI 
NT "NAO ESTA AQUI": GOTO 330 


1210 PRINT "OK":0B(G) = - 1 


1220 GOTO 330 


As linhas 1150 a 1170 procuram a 
matriz contendo a descrição curta — B8$, 
no caso do Spectrum, e OB$ nos demais 
computadores — do objeto que o aven- 
tureiro chamou. Se este é encontrado, 
o programa pula para a linha 1190. Ca- 
so contrário, a linha 1180 exibe o nome 
do objeto que o aventureiro digitou, se- 
guido de pontos de interrogação. 

Depois de encontrar o nome do ob- 
jeto, duas verificações são feitas. A li- 
nha 1190 checa o elemento da matriz de 
posição do objeto — B ou OB —, para 
saber se ele já foi levado. Em caso afir- 
mativo (o valor do elemento da matriz 
é —1), ajmensagem “VOCÊ PEGOU” 
será exibida. 

A linha 1200 verifica se o objeto está 
presente, examinando novamente a po- 
sição da matriz. Se ele não estiver pre- 
sente, O programa exibirá a mensagem 
“NÃO ESTA AQUI". Você poderá tro- 
car essa mensagem, se ela não servir pa- 
ra a sua aventura. 

Caso o objeto não tenha sido levado 
e se encontre na mesma posição que o 
aventureiro, a linha 1210 exibirá “OK” 
e o elemento na matriz de posição de ob- 
jetos será mudado para -1. 





COMO DEIXAR OBJETOS DE LADO 


A rotina “DEIXAR” faz o contra- 
rio. Ela permite que o jogador abando- 
ne qualquer dos objetos que pegou. 


1230 REM **DEIXAR** 

1240 FOR G=-1 TO NB 

1250 IF NS$=BS(G, TO LEN NS) THE 
N GOTO 1270 


1260 NEXT G: PRINT NS;"?777": GO 
TO 330 

1270 IF B(G)<>-1 THEN PRINT "V 
OCE NAO PODE LARGAR O QUE NÃO T 
EM": GOTO 330 
1280 PRINT “OK”: 
1290 GOTO 330 


Tu 


1230 REM**DEIXAR** 

1240 FOR G=1 TO NB 

1250 IF INSTR(OBS(G),NS)=1 THEN 
1270 

1260 NEXT:PRINT N$;"?7?":GOTO 3 
30 

1270 IF OB(G)<>-1 THEN PRINT "UV 

OCE NAO PODE LARGAR O QUE NÃO T 
EM" :GOTO 330 

1280 PRINT "OK" :0B(G)=L 

1290 GOTO 330 


Lab JLco] 


1230 REM ** DEIXAR ** 

1240 FOR G = 1 TO NB 

1250 IF NS = LEFTS (OBS(G). L 
EN (NS)) THEN 12/0 

1260 NEXT PRINT N$;” 
TO 330 

1270 IF OB(G) < > - 1 THEN 
PRINT "VOCE NAO PODE LARGAR O Q 
UE NAO TEM": GOTO 330 
1280 PRINT "OK”:0B(G) 
1290 GOTO 330 


LET B(G)=L 


tr": GO 


-L 


Seu funcionamento se assemelha 
muito ao da rotina “PEGAR”, vista an- 
teriormente. A matriz de descrição cur- 
ta é mais uma vez procurada — agora 
nas linhas 1240 a 1260. Se o objeto pe- 
dido estiver na matriz, a linha 1270 ve- 
rifica se está sendo levado pelo aventu- 
reiro. Se não estiver, o computador exi- 
birá a mensagem “VOCÊ NÃO PODE 
LARGAR O QUE NAO TEM”. 

Se .o aventureiro estiver carregando 
o objeto, a linha 1280 exibe “OK” eo 
elemento apropriado na matriz de posi- 
ção de objetos — OB ou B — é ajusta- 
do. Ele toma, então, o numero da posi- 
ção corrente — L —, já que —1 signifi- 
ca que o objeto estava sendo carregado. 





A LISTAGEM DO SAQUE 


O aventureiro distraído ficará muito 
grato ao obter uma lista de todos os ob- 
jetos que carrega. 

Aqui está uma rotina que faz exata- 
mente Isso: 


1070 REM **LISTAR** 
1080 PRINT "VOCE TEM ";: 
-0 


LET IN 


1090 FOR G=1 TO NB 

1100 IF B(G)=-1 THEN PRINT TAB 
10;B$(G): LET IN=IN+1 

1110 NEXT G 

1120 IF IN=0 THEN PRINT “NADA” 

1130 GoTO 330 


TT 


1070 REM**LISTAR** 

1080 PRINT "VOCE TEM ";:IN=0 
1090 FOR G=1 TO NB 

1100 IF OB(G)=-1 THEN PRINT TAB 
(10) 0B$ (G) : IN=IN+1 

1110 NEXT 

1120 IF IN=0 THEN PRINT “NADA” 
1130 GOTO 330 


Cao 


1070 REM ** LISTAR ** 

1080 PRINT "VOCE TEM ";:IN = O 
1090 FOR G = 1 TONB 

1100 IF OB(G) - - 1 THEN PRI 
NT TAB( 10);0BS(G):IN = IN + 1 
1110 NEXT 

1120 IF IN = O THEN PRINT "NA 
DA” 


1130 GoTo 330 

“VOCÊ TEM" será exibido pela li- 
nha 1080, antes que se inicie a listagem 
dos objetos. O laço FOR...NEXT che- 
ca, um a um, os elementos da matriz de 
posições de objetos. Dessa vez, os ele- 
mentos importantes são os que contêm 
—1, indicando que o objeto está sendo 
carregado. Se o valor de qualquer um 
dos elementos for —1, a descrição cur- 
ta do objeto será, então, exibida, O con- 
tador do inventário | será incrementa- 
do de 1. 

Se nenhum objeto estiver sendo car- 
regado, o contador IN continua em ze- 
ro e a linha 1120 exibe “NADA”, em 
vez da lista de objetos. 

As rotinas “PEGAR”, “DEIXAR” 
e “LISTAR” podem ser usadas como 
estão, se NB for definido em uma roti- 
na anterior. 

Agora, O programa está pronto pa- 
ra receber as rotinas finais, que serão 
apresentadas num próximo artigo. Elas 
se referem ao fiscal da Receita, ao ti- 
jolo, à lâmpada, à procura do globo 
ocular, ao término da aventura e, fi- 
nalmente, à instrução descrevendo o ob- 
jeto da busca. 

Se você fizer uma experiência, execu- 
tando o programa neste estágio, verá 
que, enquanto parte dele funciona, al- 
guma coisa estranha acontece. À razão 
para isso é que o programa requer um 
número de rotinas que ainda não exis- 
te. Se você entrar certas palavras, o pro- 
grama tentará desviá-las para linhas ine- 
xistentes. 





| | | 11 





Nenhum programa está livre de erros. 
Aprenda a localizá-los e habitue-se a 
corrigilos na medida em que aparecem. 
Esta é, sem dúvida, a melhor maneira 
de evitar problemas mais sérios. 


Nenhum programa, de qualquer ta- 
manho, que esteja sendo desenvolvido 
ou simplesmente copiado de uma lista- 
gem, está completamente livre de erros 
— os “grilos”. Estes aparecem pelas 
mais diversas razões e comprometem o 
programa em graus diferentes. 

Os erros mais sérios podem impedir 
que um programa seja rodado. Outros, 
simplesmente, permanecem ocultos, até 
que certa rotina ou sequência de entra- 
das os revele. Por exemplo, em um jo- 
go de aventuras, tudo pode funcionar 
perfeitamente até que o Jogador tome 
um determinado caminho, carregando 
uma faca — e cai num buraco que não 
deveria estar ali. Ou, em um programa 
de contabilidade, pode-se de repente en- 
contrar um erro enorme, que afeta ape- 
nas as entradas feitas na segunda sema- 
na de dezembro. 

O primeiro tipo de erro deve ser com- 
pletamente eliminado antes da utilização 
do programa. 

E o segundo? Bem, o ideal seria 
procurá-los sistematicamente, para evi- 
. tar surpresas. A melhor maneira de fazê- 
lo é testar cuidadosamente o programa 
— o que inclui tentar o inesperado, co- 
mo entrar uma sequência “impossivel” 
de entradas. Para auxiliar nesse tipo de 
tarefa, existem rotinas muito úteis, es- 
peciais para detecção de erros. Logo fa- 
laremos sobre elas. 





MENSAGENS DE ERRO 


Todos os computadores domésticos 
produzem mensagens de erro, de um ti- 
po ou de outro. Você Já deve ter encon- 
trado várias delas, desde que começou 
a utilizar o computador. 

Tais mensagens variam de códigos 
simples de números e letras a descrições 
completas que deixam poucas dúvidas 








sobre a natureza do erro — ainda que, 
às vezes, não apontem diretamente o 
próprio erro. 

Maiores detalhes sobre as mensagens 
de erro podem ser encontrados no ma- 
nual do seu computador. Consulte-o 
sempre que não compreender o signifi- 
cado exato de alguma delas. Só depois 
comece a trabalhar na correção do erro. 





““DEPURE” O PROGRAMA 


Para evitar problemas maiores, é 
muito importante localizar e corrigir ca- 
da erro na medida em que aparece. Não 
deixe um erro permanecer em um pro- 
grama, mesmo que este pareça rodar sa- 
tisfatoriamente. 

Caso contrário, sempre haverá uma 





MENSAGENS DE ERROS 
ORIENTAÇÕES OBSCURAS 
“OS ERROS MAIS COMUNS 
TESTE SUA HABILIDADE 
EM DETECTAR ERROS 


chance de que o erro apareça mais tar- 
de, numa hora crítica. A consequência 
poderá ser um desastre para o progra- 
ma, o que resultará em muita digitação 
extra, ou — pior ainda — na perda dos 
dados disponíveis, se o programa for co- 
locado em uso efetivo. No final, você 
não terá mais a oportunidade de resol- 
ver o problema. 

Corrigir os erros, ou seja, “depurar” 
o programa, pode se tornar uma tarefa 
terrivelmente complicada se você não se 
empenhar em isolar cada problema de 
modo sistemático. Ao digitar um pro- 
grama pronto ou ao desenvolver o seu 
próprio, é muito provável que cometa 
mais de um erro. Trate cada um indivi- 
dualmente — ou seja, localize e corrija 
o primeiro deles e só depois se dirija ao 
seguinte. 











| TABELA DE LOCALIZAÇÃO 


Esta é uma linha 
erros e comunicad 
putador. Quando 
precedida por um aste 
ro provavelmente se encontra na li- 
nha cujo número está indicado na 
mensagem ou, então, é o resultado 
imediato de uma entrada direta ou de 
uma atividade (tal com SAVE). Sem- 
pre existem exceções, especialmente 
quando uma variável, que é a causa 
de um erro em determinada linha, 
tem seu valor designado em uma li- 
nha previamente executada. 

Quando digitar os programas, se- 
ja cuidadoso ao incluir espaços. 
E 
NEXT sem FOR, variável inexisten- 
te, Erro de índice, *Memória lotada, 

| *Excede drea de vídeo, Número ex- 
cede limite, RETURN sem GOSUB, 

*Fim de arquivo, *Stop executado, 

Argumento inválido, Inteiro excede 

| limite, *Erro de sintaxe, *BREAK- 
CONT repete, Fim de dados, *Nome 
inválido, *Sem memória disponivel, 
STOP em INPUT, FOR sem NEXT, 
Periférico inválido, *Cor inválida, 
BREAK-CONT prossegue, RAMTOP 
válido, *Comando perdido, *Canal 
inválido, FN sem DEF, Erro de pa- 
râmetro, *Erro de leitura. 


(O, AO, BS, 







*CN, *DD, *DN, DS, 





LOCALIZAÇÃO DOS ERROS 


Não se esqueça de que o erro mais 
simples é, em geral, o mais difícil de ser 
isolado, e — ao contrário do que pode- 
rá pensar — quase sempre é a única cau- 
sa da dificuldade em rodar um progra- 
ma adequadamente. 

Muitos problemas podem ser evita- 
dos com a utilização de um conjunto de 
rotinas para depurar os programas. 
Existem algumas técnicas bem simples 
e caminhos muito eficazes. 

Para começar, muitas mensagens de 

erro apontam diretamente para a linha 
na qual ocorre o erro. Isso inclui o 









FC, FD, FM, *ID,| 
NO, OD, OM, O 
157, "IM, CUL: 


Le) 


*“CONT” ILEGAL, *DI 
POR ZERO, *DIRETO ILEGAL, 
*VALOR ILEGAL, “NEXT” SEM 
“FOR”, FIM DE DATA, FALTA 
MEMÓRIA, *FÓRMULA COM- 
PLEXA, *S/ESPAÇO, *REDI- 
MENSIONAR, “RETURNHSSE 

“GOSUB”, “STRING” 
ÍNDICE ILEGAL, *SIN 
RO, *TIPO INCOMPAT,* 











Ed 















TENTE, INDICE FORA DO LIMH 
TE, “DIM" REDEFINIDO, *DIVI, 
SAO POR ZERO, DIRETO ILE 


GAL, TIPO DESIGUAL, *FALTA 4 
ÁREA *“STRING”, *“STRING" 





LONGA, *“STRING” COMPLE- 
XA, NÃO CONTÍNUO! FUNÇÃO 
NÃO DEFINI PERIFE- 
RICO, ERRO, ESUME”; 
“RESUME” “ *FAL- 
TA OPERAN. HA MUITO 
LONGA 





mais comum deles — ERRO DE SIN- 
TAXE —, além de vários outros 
(veja a tabela). Alguns, porém, são me- 
nos evidentes, e indicam erros em linhas 
que estão perfeitamente corretas. Você 
pode obter uma mensagem como É Fim 
de dados 10:2 (o exemplo é do Spec- 
trum, mas outros computadores apre- 
sentam mensagens semelhantes). Apa- 
rentemente, trata-se de uma indicação 
de que o erro se encontra na segunda 
instrução da linha 10. Na verdade, a se- 
gunda instrução da linha 10 diz ao com- 
putador para ler alguns dados, o que po- 
deria aparecer também na linha 200 ou 
até mesmo na linha 2000. Por outro la- 
do, talvez o erro estivesse nas linhas de 



















dados, e não na linha 10. 

Esse tipo de erro é, evidentemente, 
muito mais difícil de se localizar, já 
que não existe nenhuma indicação preci- 
sa de onde se encontra o verdadeiro 
problema. 

As mensagens de erro, Ique aponta 

4 linha, revelam apenas que o problema 
»ve estar relacionado à maneira como 
executou uma entrada em determina- 
la linha do programa. 
- Anicie efetuando uma listagem do 
programa a partir de um ponto antes do 
número da linha sugerida na mensagem 
de erro. Algumas vezes, é útil listar a 
própria linha, separadamente e um pou- 
co além das outras, se isso for possivel 
em seu computador. 

Antes de mais nada, verifique se vo- 
cê não cometeu nenhum tipo de erro li- 
teral — ou seja, se escreveu algo de mo- 
do errado ou se utilizou uma letra no lu- 
gar de um número (ou vice-versa). Seja 
especialmente cuidadoso em relação aos 
espaços e à pontuação. É procure ver se 
falta algum caractere — é muito fácil, 
por exemplo, esquecer um parêntese em 
uma sequência que utilize vários deles. 
Examine com atenção as palavras-cha- 
ve, letra por letra, pois também é bas- 
tante comum a inversão da ordem dos 
caracteres. 

Ds erros literais costumam ser uma 
a frequente de problemas, pertur- 
do o desenvolvimento do trabalho 
anto de iniciantes quanto de especia- 





farto 


LINHA POR LINHA 





Quando você sabe que o erro está em 
determinada linha, e esta contém duas 
instruções, precisará descobrir qual de- 
las apresenta o problema. O melhor mé- 
todo para isso é colocar uma instrução 
STOP em uma nova linha, imediata- 
mente após a que foi indicada pela men- | 
sagem de erro. Em seguida, entre uma 
instrução REM bem no início da última 
declaração e rode novamente o progra- 
ma — se nenhum desastre tiver aconte- 
cido até este ponto, é claro. Caso o er- 
ro de sintaxe não apareça, você saberá 
que ele se encontra na última de- 
claração. 

Pode-se utilizar um método parecido 
para descobrir, entre algumas linhas, a 
que contém o erro. Basta inserir suces- 
sivamente, entre cada linha, uma linha 
extra com a instrução STOP, como mais 
tarde explicaremos em detalhe. 

O método, porém, não pode ser am- 
pliado com segurança para as linhas 
com instruções múltiplas, pois qualquer 
coisa antes do REM e si da ei 





| | Eu | | a 


ma linha do programa será ignorada. 
Nestes casos, deve-se dividir a linha em 
seus componentes e verificar isolada- 
mente um por um. Cada instrução po- 
de ser colocada em uma linha adicional. 
O procedimento é simples e bastante 
útil, sobretudo quando a situação pare- 
ce muito confusa e obscura, 

Rode o programa mais uma vez pa- 
ra ver qual das novas linhas do grupo 
causa a mensagem de erro e retire-a do 
programa. 


PARTE POR PARTE 





Declarações individuais muito longas 
apresentam um tipo diferente de proble- 
ma e, talvez, a melhor maneira de uni- 
las seja determinar o valor real de cada 
parte delas. 

Mais uma vez, considere a hipótese 
de ter cometido um erro banal, antes de 
buscar interpretações complicadas. Se 
possível, reescreva a linha defeituosa do 
programa, de modo que obtenha um nú- 
mero de linhas separadas que possam ser 
tratadas individualmente. Esta é uma 
boa razão para se deixar espaços entre 
os números de linhas. 


Onde você não puder fazer isto, 
“exploda” mentalmente a instrução 
e pergunte-se o que cada entrada es- 
tá fazendo naquele determinado pon- 
to do programa. Tente calcular quais 
os valores que foram obtidos para to- 
das as variáveis em uso neste exato 
ponto. 

Com o erro de sintaxe, os valores de 
qualquer variável em ação são irrelevan- 
tes — eles não poderão ser a causa do 
problema. Assim, mude a linha à von- 
tade, mesmo que isso limpe as variáveis. 

Se estiver lidando com um problema 
muito obscuro, o valor (ou valores) real 
da variável poderá fornecer os indícios. 
Utilize o computador para imprimir es- 
ses indícios no modo direto (imediato), 
antes de efetuar qualquer modificação 
no programa. 

Simultaneamente, verifique o nome 
da variável, para se certificar de que es- 
tá correto. Suponhamos que você habi- 
tualmente utilize a variável D para um 
loop de atraso de tempo, E bem prová- 
vel que a introduza no programa sem 
querer, quando estiver copiando uma 
listagem e se deparar com um loop pa- 
recido, mas que utiliza uma variável di- 
ferente — um T, por exemplo. 






ORIENTAÇÕES OBSCURAS 


Muitas mensagens de erro não forne- 
cem indicações claras do numero da li- 
nha errada. Em vez disso, simplesmen- 
te indicam onde um erro teve algum efei- 
to. Quando isso ocorre, pode ser difícil 
apontar a causa com precisão. 

Mas existem exceções. Como no 
exemplo acima, as mensagens DATA de 
erro são exibidas em uma linha que con- 
tém uma instrução incluindo READ 
quando, na verdade, o próprio erro se 
encontra na linha de instrução DATA. 

Outras mensagens são menos eviden- 
tes (veja a tabela). No entanto, a maio- 
ria delas refere-se a erros que ocorrem 
antes do número das linhas apostrofa- 
das na execução do programa. Essa é 
uma distinção importante, pois o erro 
pode estar, de fato, em uma sub-rotina 
situada antes ou depois da linha indica- 
da na declaração de erro. Assim, uma 
variável poderá apanhar um valor incor- 
reto bem antes de identificá-lo. 

A melhor maneira de lidar com erros 
menos óbvios é examinar a ação do pro- 
grama. Inicie imprimindo o valor de ca- 
da variável. Se você possuir uma impres- 
sora conectada ao computador, poderá 











efetuar uma cópia deles. Mas é fácil uti- 
lizar o comando direto PRINT ou qual- 
quer abreviação adequada, seguida pe- 
lo nome da variável — tal como PRINT 
Y — e anotar os valores. 

Examine, depois, como as variáveis 
funcionam em relação uma à outra. No- 
vamente, poderá ser bastante útil divi- 
dir uma linha muito longa do programa 
em linhas mais curtas, cada qual conten- 
do uma única instrução. 

Pesquise cada variável a partir desse 
ponto do programa, para comparar seu 
valor real (o número que você anotou) 
com o que poderia ter se o programa To- 
dasse corretamente. 

Em um programa muito extenso, O 
trabalho será difícil e demorado. Parte 
dele poderá ser evitada se você rodar O 
programa em vários estágios distintos — 
imediatamente antes e depois de um de- 
terminado conjunto de entradas, por 
exemplo. Observe, então, as modifica- 
cões dos valores das variáveis. 

A não ser que você esteja familiari- 
zado com o uso das teclas <RUN/ 
STOP> ou <BREAK> do seu com- 
putador, é aconselhável introduzir no 
programa linhas provisórias contendo a 
declaração STOP. Mas note que, com 
esse procedimento, você limpará a me- 
mória e, assim, deverá rodar o progra- 
ma mais uma vez — o que nem sempre 
será possivel. 

Quando o programa parar, imprima 
os valores das variáveis e, em seguida, 
tecle a instrução para continuar até O 
próximo STOP. 


ERROS COMUNS 





Entre as causas mais comuns de er- 
ros de programa estão as falhas come- 
tidas no código de entrada, a partir de 
listagens Impressas. 

O problema específico é gerado so- 
bretudo pela confusão entre caracteres 
parecidos: casos típicos são as letras | 
em tipo minúsculo, I em tipo maiuscu- 
lo e o número 1, assim como a letra O 
e o número O. 

E fácil também confundir, sobretu- 
do em listagens de pouca qualidade, dois 
pontos com ponto e vírgula, e ponto fi- 
nal com virgula. O ponto e virgula é uti- 
lizado para a formatação da exibição, 
e o uso acidental de dois pontos (sinal 
que indica o fim de uma declaração), co- 
mo no exemplo abaixo, poderá resultar 
simplesmente em uma mensagem de 
“ERRO DE SINTAXE ': 


95 INPUT “ENTRE SEU NOME” :N$3 


A confusão entre o ponto final e a 








vírgula, porém, é ainda mais difícil de 
se identificar. Veja estas duas linhas: 


1000 DATA 12.4,6,7,8,13,1.7 
1000 DATA 12.4,6,7,8.13,1.7 


Tanto uma quanto outra pareceriam 
corretas, até mesmo depois de um mi- 
nucioso exame. Note que existem seis 
itens de dados na primeira linha, mas 
apenas cinco na segunda. 

Este poderia ser um indício de erro, 
caso as outras declarações DATA con- 
tivessem um número idêntico de itens. 
Incidentalmente, portanto, teriamos um 
método simples de realizar pelo menos 
uma verificação. 

Se uma mensagem de erro exibiu 





“FIM DE DADOS”, não existem itens 
de dados suficientes; portanto, a segun- 
da linha poderia estar incorreta. 

A presença de muitos itens, por sua 
vez, não provoca uma mensagem de er- 
ro; simplesmente assinala os valores in- 
corretos para a variável READ ou, ain- 
da, o valor incorreto para algumas das 
variáveis, se uma outra linha de dados 
tor curta. 

Uma mensagem de erro pode tam- 
bém resultar em uma linha READ ou 
uma linha de cálculo, se o tipo incorre- 
to do valor for assinalado para uma va- 
riável READ. 

O uso da letra O em vez do número 
O — ou vice-versa — pode acarretar um 
efeito idêntico. 
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ESPAÇOS ” 


Deve-se deixar espaços em determi- 
nados lugares do programa, mas 
eliminá-los totalmente em outros — o 
problema, quase sempre, é reconhecer 
que algo tão “transparente” seja a causa 
de um problema. 

Os espaços utilizados por razões es- 
téticas — para separar, por exemplo, 
uma declaração impressa de outra ou 
tornar as listagens um pouco mais cla- 
ras — não ocasionam erros se forem 
omitidos. Mas suspeite deles se a exibi- 
ção na tela parecer achatada ou tiver 
partes superpostas. 

Uma mensagem de erro ocorre se, 
acidentalmente, você incluir um espaço 
entre certas palavras-chave e o argumen- 
to que as segue colocado entre parênte- 
ses. Por exemplo: TAB(n) está correto; 
TAB (n), não. As condições que deter- 
minam erros relacionados a espaço va- 
riam de um computador para outro, 
mas vale a pena verificar esse aspecto se 
não detectar falhas de outro tipo. 


ERROS ESPECÍFICOS 





Cada computador apresenta um tipo 
peculiar de erro, quase sempre relacio- 
nado a imperfeições — e não erros, pro- 
priamente — no sistema de operações ou 
no próprio hardware. Com freqiiência, 
a falha se encontra no próprio BASIC 
e certas palavras-chave não se compor- 
tam adequadamente sob determinadas 
circunstâncias. Algumas das mais co- 
muns estão detalhadas aqui, e serão 
apontadas em INPUT sempre que pos- 
sam causar problemas inesperados, ca- 
so não se tome o devido cuidado. 


FAÇA UM TESTE 





Eis aqui um teste para a sua habili- 
dade em detectar erros e uma oportuni- 
dade para colocar em prática tudo o que 
aprendeu. Os programas que se seguem 
estão cheios de erros — do tipo que po- 
deria ser introduzido durante a cópia de 
uma listagem ou na adaptação de um 
programa sobre cuja ação não se tem 
um conhecimento completo. Eles osci- 
lam de erros simples de digitação e sin- 
taxe a erros na estrutura do próprio 
programa. 

A versão correta do programa foi pu- 
blicada na página 195 de INPUT. Adi- 
cionamos aqui uma linha extra para fa- 
zer com que o programa seja rodado no- 
vamente. Mas não olhe o programa ori- 
ginal até que tenha elaborado o seu pró- 
prio caminho para localizar os erros. 


O programa é um exemplo bem cur- 
to de como se deve distribuir os objetos 
entre os compartimentos de um jogo de 
aventuras. A lista dos objetos é lida a 
partir de uma lista de dados organiza- 
dos em um conjunto; os números dos 
compartimentos estão armazenados em 
outro conjunto. A parte principal do 
programa — as linhas 70 a 100 — de- 
signa, aleatoriamente, um objeto para 
cada compartimento, verifica se todos 
foram utilizados e se há apenas um em 
cada compartimento. A linha LO sim- 
plesmente imprime o resultado. Pelo 
menos é isto o que o programa deveria 
fazer se estivesse correto. 

É provável que você identifique vá- 
rios erros imediatamente, por meio da 
simples leitura do programa. Tente con- 
sertar todos os que puder e, então, 
quando estiver com o programa limpo, 
digite-o em seu computador e experi- 
mente rodá-lo. Certamente restarão al- 
guns erros escondidos que você não 
identificou na primeira vez. 

Se não conseguir resolver tudo, vol- 
te à página 195; de qualquer maneira, 
a versão correta da última linha deverá 
ser elaborada por você. E tenha o cui- 
dado de não introduzir novos erros 
quando estiver corrigindo os outros! 


10 LET g=l14 

20 DIM as(g,7): 
30 FOR z=1 TO q 
40 READ aS(qg) 
50 LET a(z)=z | 
70 FOR x=-qg TO 1 STEP -I 

BO LET q=INT (RND*x)+1 

90 LET t=a(x):; LET a(x)-a(gq): 


DIM a(o) 


LET a(g)=T 
100 NEXT x 
110 FOR t=1l TO q: PRINT "A sal 
a;t;tem";aS(a(t)): NEXT £ 


120 DATA corda,"espada”,"espan 
ador”","faca”,"revolver”","chave 
""tocha","carro","lanterna”,"“m 
achado”,"bomba","livro","aerom 
odelo”,"robo” 

130 GOTO 10 


DIRIA, 


10 LET G = l4 

20 DIM AS(G),A(G) 

30 FOR Z = ITOG 

40 READ AS(G) 

50 LET A(Z) = Z 

70 FOR X = GTO 1 STEP -I 


BO LET Q = INT ( BND (1) * X) 
+ 1 

90 LET T = A(X): LET A(X) = A( 

Q); LET A(Q) = T 

100 NEXT X 


110 FORT = 1 TO G: PRINT “AS 


ALA” ;T"TEM" ;AS(A) (T)): NEXT T 
120 DATA  CORDA,ESPADA, ESPANA 
DOR, FACA, ARMA, CHAVE, TOCHA, CARRO 
| LIQUIDIFICADOR, SOFA, BOMBA, LIVR 
O, AEROMODELO, ROBO 

130 GoTo 10 


Para o MSX, adicione a linha abaixo: 


E Ms 


10 LET G=14 

20 DIM AS(G) ,A(G) 

30 FOR Z=1 TO G 

40 READ AS(G) 

50 A(Z)=Z 

70 FOR X=G TO 1 STEP-I 

80 Q=RND(X) 

90 T=A(X) :A(X)=A(Q) FA(Q)=L 

100 NEXT X 

110 FOR T=1l TO G:PRINTCNA SALA” 
:T"HA"AS(A) (T)) :NEXT T 

120 DATE CORDA, ESPADA, ESPANADOR 
| FACA, ARMA, CHAVE, TOCHA, CARRO, LA 
NTERNA, MACHADO, BOMBA, LIVRO, AERO 
MODELO, ROBO 


BND ( - TIME) 














13 CÓDIGO DE MAQUINA 13 





























O ZX-81 não tem muitos recursos 
gráficos. O Apple, embora os tenha com 
boa qualidade e resolução, define as fi- 
guras móveis por meio de um processo 
bastante complicado, 

Com o código de máquina podemos 
obter alguns efeitos visuais no ZX-81. 
Um programa editor facilitará a criação 
de figuras móveis no Apple. 


“ER 


Enquanto outros micros usam uma 
codificação bem simples para criar figu- 
ras em alta resolução — números biná- 
rios, onde “1” e “0” correspondem a 
pontos ““acesos” e “apagados —, 0 
Apple tem um código complexo, que 
não expCaREmOS Agora: 
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Neste artigo, os usuários do Apple e 
do ZX-81 verão como produzir figuras 
móveis. Usando os programas e 
observando as instruções, poderão, em 
seguida, criar seus próprios desenhos. 


Para facilitar o trabalho, o progra- 
ma a seguir cria uma '“tabela de figu- 
ras” na memória do micro, a partir de 
padrões desenhados com asteriscos den- 
tro de linhas DATA. 


100 HOME :E = 35000: HIMEM: E: 
DIM A(100),B(100) 

110 HTAB 10: VTAB 12: PRINT 

M INSTANTE, POR FAVOR” 

120 FOR I = 35000 TO 37000: PO 

KE 1,0: NEXT : HOME 

130 F = INT (E / 256) 

140 POKE 232,E - F * 256: POKE 
233,F 

150 PRINT * (DEFINICAO DA TABEL 

A) LINHA DATA ";: PRINT "20 ,0 
"“:: FOR II = O TO 19:W = INT d( 
(42 + II * 32) / 256):0 = 42 + 


"U 








II * 32 -Wx*x 256: PRINT ",";O0; 390 HOME : HGR : SCALE= 1: ROT 
"o PaW;” "5: NEXT II: PRINT: P = 0 a 
RINT : PRINT "RETURN P/ CONTINU 400 FOR I = 150 TO 75 STEP - 
AR”: INPUT "";0S: HOME 5 RE 
160 POKE E,20: POKE E + 1,0: F 410 HCOLOR= 3 
OR II = O TO 19 420 DRAW II + 1 AT 130,1 
1720 W = INT ((42 + II * 32) / 430 HCOLOR= O 
256):0 = 42 + II * 32 -W* 256 440 DRAW II+1 AT 130,1 
: POKE E + 2 + 2 * II,O: POKE E 450 NEXT 1 
+ 3+2* II,W 460 HCOLOR= 3 
180 FORI = O TO l100:B(I) = O: 470 DRAW II + 1 AT 130,75 
NEXT 1 480 FOR I = 1 TOS0: NEXTI 
190 Q = O: GR : COLOR= |: FOR I 490 NEXT II: END 
= 1] TO 8: READ Z$: FOR J = 1T 500X = 16:7 = 30:K =» 1: FOR J' 
o 8 - 1 TO d4 
200 IF MIDS (Z58,J,1) = "*” TH 510 FORI =-17ToB 
EN PLOT J+ 15,1 + 29 520 M = 1: IF SCRN( X,Y) = 1T 
210 NEXT J: NEXT I HEN M = M+ 4 
“220 HTAB 17: VTAB 21: PRINT "1 530%» X+ 1:A(K) = MK = K + 
2345678" 1 
230 goTo 500 540 NEXT 1 
240 FORV = 0OTOK-1 550 M = é Plus SCRN( X, 7) “1T 
250 IF B = 2 ANDA(V) > O AND HEN M = M+ 4 
A(V) < 4 THEN 280 560 Y = : + L:A(K) = M: K -=K + 
260 IF B < 2 AND (A(V) > 0 0R 1 
EEE “UR ES TUE | 
+ E  HEEN  HENNEO 4 
VEI EM (en 1 2 ERE | 
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A(V) > 4) THEN 280 

270 B- 0:0 = Q+1 
280 B(Q) = B(Q) + A(V) * 
) 

290 B = B+ 1 


to" B 


300 IF B > 2 THENB=0:Q=0Q 
+1 

310 NEXT V 

320 TEXT : HOME : PRINT "(FIGU 
RA ";II + 1;") LINHA DATA "; 


330 FOR V = O TO da 
340 IF V< > O THEN PRINT”, 


350 


PRINT B(V);”" "; 
360 POKE E + 42 +32 *TI+v, 
B(V) 
370 NEXT V 
380 PRINT : PRINT : PRINT "RET 


URN P/ CONTINUAR": INPUT *";0S 


































LE EDITOR DE FIGURAS 
E MOTO E SUBMARINO NO APPLE | 
= COMO MOVIMENTAR OS 
Ê DESENHOS 
[E UM MONSTRO NO ZX-81 . 
570 FORI =1ToB E 
580 M = 3: IF SCRN( X,Y) = 1T 
HEN M = M + dá | 
590 X =X - 1:A(K) = M;K = K + 
1 

600 NEXT I 

610:M-=» Z: TF" SCRN( X,7) «= 17 
HENM = M+ 4 

620 7 = T+ I:A(K) = M:K K + 

1 

630 NEXT J 

640 GOTO 240 

1000 REM 12345678 | 

1001 DATA " ” 

1002 DATA " " 

1003 DATA *” ” 

1004 DATA ” ” 

1005 DATA * pf 

1006 DATA " ra 

1007 DATA " as E 

1008 DATA " ada dod 


O programa permite que você crie fi 
guras móveis, tomando como modelo os 
desenhos que aqui apresentamos. Esses. 


desenhos são destinados a outros mi- 


cros, onde as figuras compoem-se de 


blocos de oito por oito pontos. E 


Para utilizar O programa, adicione ao. 
seu final linhas DATA correspondentes 


às figuras da moto das páginas 316 e 
317. Cada linha DATA deve conter o. 


padrão de uma das linhas de um bloco 
de oito por oito pontos, desenhado com 
asteriscos. Na listagem encontram-se as 


oito primeiras linhas DATA, correspon- | 


dentes ao primeiro bloco da moto. Di- 
gite os blocos na seguinte ordem: bloco 
superior esquerdo, bloco inferior es- 
querdo, bloco superior da segunda co- 
luna, e assim por diante, até O bloco in- 
ferior direito, Podem ser digitados até 
vinte blocos, ou 160 linhas DATA. 


Para montar na memória do Apple 
uma tabela de figuras, digite RUN. O 
mesmo comando imprimirá as linhas: 
DATA necessárias para criar a tabela de: 
dentro de um programa BASIC, Os de- 
senhos dos blocos digitados serão exe 


ão 


ER 2. 
om DA 
r dá 


cutados em baixa e alta Ececodo 


o um 


j RREO OST 





da moto n na mem na ia — são de; 
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programa em código que será criado. As 
linhas 10 a 25 contêm o programa que 
coloca o monstro na tela — os códigos 
estão dentro de AS. Os zeros — 32 ao 
todo — da linha 30 apagam o desenho 
com espaços em branco. 

A linha 35 contém o padrão do 
monstro. Se compararmos seu conteuú- 
do — dois digitos de cada vez — com 
o conjunto de caracteres do apêndice A 
do manual, veremos que ali estão carac- 
teres gráficos invertidos. 

Esses caracteres desenham o mons- 
tro, do canto superior esquerdo ao in- 
ferior direito. Como eles dividem um es- 
paço de caractere em quatro partes, a re- 

solução final é de oito por oito pontos. 

Para mudar o desenho, basta trocar 
os números nesta linha. Códigos de co- 
mandos BASIC que tenham mais de um 
caractere com AT, TAB, THEN ou 
LEN não podem ser empregados. 

Quando utilizamos RUN, o progra- 
ma contido em A$ é colocado no espa- 
ço que se segue a REM pelas linhas 50 
a 80. Se listarmos, então, o programa, 
veremos os caracteres correspondentes 
aos códigos. Os que desenham o mons- 
tro estão no final da linha. 

Depois que o programa estiver den- 
tro da linha REM, apague as demais e 
digite: 


LET X=14 
20 LET Y=B 









30 POKE 16571,1 
40 POKE 16572,Y 

50 POKE 16573,X 

60 RAND USR 165l4 

100 LET AS=INKETYTS 

110 IF A$="" THEN GOTO 100 

120 IF AS="Z" AND X>0 THEN LET 
R=X-1 

130 IF AS="X" AND X<28 THEN 
LET X=X+1 

140 IF A$="P" AND Y>0 THEN 
à doi fe 

150 IF AS="L”" AND Y<20 THEN LET 
Y=Y+1 

160 POKE 16571,0 

170 RAND USR 16514 

180 GoTo 30 


LET 


As linhas 10 e 20 colocam as coorde- 
nadas do centro da tela em X e Y. A l- 
nha 30 introduz o número 1 no progra- 
ma em código, usando POKE, para que 
seja impresso o monstro, e não espaços 
em branco. As linhas 40 e 50 colocam 
X e Y da mesma forma, estabelecendo 
a posição da figura. A seguir, a rotina 
em código é chamada e o computador 
desenha o monstro. 

As linhas 100 a 150 contêm a rotina 
típica que move algo na tela (veja pági- 
na 31). Z movimenta o desenho para a 
esquerda, X para a direita, P para cima 
e L para baixo. 

A linha 160 coloca O dentro do pro- 
grama em código, para desenhar espa- 
ços em branco; a linha 170 chama o pro- 
grama, apagando o desenho. A linha 
180 volta ao início. 


INVERSÃO DA TELA 





Com o código de máquina, pode-se 
também inverter a tela no ZX-81. O pro- 





grama a seguir faz isso, trocando o preto 
pelo branco e vice-versa. Embora ele de- 
va ser chamado de dentro de um progra- 
ma BASIC, coloque-o na memória usan- 
do o nosso monitor (veja página 92). 
ZA 0C 40 06 17 23 7E FE 76 28 
05 C6 BO 77 18 F5 10 F3 C9 

Use RAND USR “endereço inicial” 
parairodá-lo. Como esse comando, sem 
um número na frente, limpará a tela, o 
efeito não será interessante. Um progra- 
ma simples dará melhores resultados. 


20 LIST 
30 RAND USR 


Aqui, RAND USR deve ser seguido 
do endereço inicial do programa. 

Podemos ainda colocar essa rotina de 
inversão dentro do programa do mons- 
tro. Os códigos serão adicionados a AS. 
Acrescente a linha: 
40 LET AS=AS+"2A0C400617237EFE7 
62805C6807718F510F3C9* 


Note que não há espaço entre os 
códigos. 

A linha 50 deve ser alterada para co- 
locar os códigos extras dentro do REM. 


50 FOR N=16514 TO 16624 


A linha REM precisa ter mais 19 es- 
paços disponíveis, pelo menos. Após ro- 
dar o programa com essas modificações, 
apague todas as linhas, com exceção da 
REM, e copie o programa de movimen- 
tação com esta linha a mais: 


155 IF A$="I1”" THEN RAND USR 
06 


O endereço 16606 é o início da nova 
rotina. Ela poderá ser chamada por 
meio da tecla I. Ao pressioná-la, O 
monstro será invertido. Mantendo a 
pressão, ele cintilará. 


166 





SIMULE ALTA RESOLUÇÃO 


Como você já sabe, o ZX-81 não tem 
alta resolução gráfica. Porém, com o có- 
digo de máquina, pode-se produzir al- 
go semelhante. Este programa simples- 
mente usa POKE para colocar um pe- 
queno programa após o REM da linha 
10 e, depois, o chama. 


ii. 


16514,62 
16516,23/7 
40 POKE 16517,71 
50 POKE 16518,201 
60 FOR N=0 TO 30 
70 POKE 16515,N 
B0 RAND USR 16514 
90 NEXT N 


Infelizmente, não há um processo fá- 
cil para mover desenhos desse tipo. 


20 POKE 
30 POKE 











LINHA 


Apple Il + 

Apple Il+ 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple + 
Apple ll+ 
Apple Il + 
Apple + 
Apple + 
Apple + 
Apple ll+ 
Apple ll + 
Apple ll+ 
Apple ll + 
Apple Il + 
Apple ll + 
Apple Il + 
Apple + 
Apple Hl+ 
Apple Il + 

Apple Il + 
Apple ll + 
Apple ll + 
Apple ll + 
Apple Il + 
Apple ll+ 
Apple lle 

Apple Ile 


Apple Ile 
MSX 


MSX 


FABRICANTE Po 


Appletronica 
CCE 

CPA 

CPA 

Digitus 
Dismac 
ENIAC 
Franklin 
Houston 
Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Milmar 
Milmar 
Milmar 
Omega 
Polymax 
Polymax 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Unitron 
Victor do Brasil 
Victor do Brasil 
Microcraft 
Microdigital 
Spectrum 
Gradiente 
Sharp 


MODELO 


Thor 2010 
MC-4000 Exato 
Absolutus 


| Polaris 


DGT-AP 
D-8100 
ENIACII 
Franklin 
Houston AP 
DMII 
MX-2001 
MX-48 

MX.64 
Maxitronic | 
Crafll Plus 
Apple Il Plus 
Apple Master 
Apple Senior 
MC-400 
Maxxi 

Poly Plus 
Microengenho | 
Spectrum ed 
Venus ll 

SICI 

API 

Elppa ll Plus 
Elppa Jr. 
Craftlle 
TK-3000 He 


"Microengenho ll 


Expert GPC4 
Hotbit HB-8000 


FABRICANTE 


Appletronica 
Apply 

CCE 

CPA 

CPA 
Codimex 
Digitus 
Digitus 
Digitus 
Dismac 
Dismac 
Dismac 
Dynacom 
ENIAC 
Engebras 
Filcres 
Pranklin 
Gradiente 
Houston 
Kemitron 
LNW 

LZ 

Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Microcraft 
Microdigital 
Microdigital 
Microdigital 
Microdigital 


MODELO 


Thor 2010 
Apply 300 
MC-4000 Exato 
Absolutus 
Polaris 
CS-6508 
DGT100 
DGT-1000 
DGT.AP 
D-8000 
D-8001/2 
D-8100 
MX1600 
ENIACII 
AS+1000 
NEZ-8000 
Franklin 
Expert GPC1 
Houston AP 
Naja 800 
LNW-B0 
Color 64 
DMI 
MX-2001 
MX-48 
MX-64 
Maxitronic | 
Craft ll Plus 
Caftlle 
TK-3000 Ile 
TK-82C 
TK-83 

TK-85 


PAÍS 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


Brasil 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


LINHA 


Apple Il+ 


o Sinclair ZX-81 


Apple ll + 
Apple + 
Apple ll + 
TRS-Color 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
Apple + 
TRS-80 Mod.! 
TRS-80 Mod. 
Apple ll + 
TRS-Color 
Apple ll+ 
Sinclair ZX-81 
Sinclair ZX-81 
Apple ll + 
MSX 

Apple Il + 
TRS-80 Mod.lll 
TRS-80 Mod. | 
TRS-Color 
Apple Il + 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple Il+ 
Apple lle 
Apple lle 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 


Microdigital TK-90X Brasil 
Microdigital TKS-800 Brasil 


Sinclair Spectrum | 
TRS-Color 


Microdigital TK-90X 
Timex 2000 


Sinclair Spectrum 
Sinclair Spectrum Timex 


Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
TRS-80 Mod.I 
TRS-80 Mod. | 
TRS-80 Mod. | 
TRS-80 Mod.! 
TRS-80 Mod.lil 
TRS-BO Mod.il 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lll 
TRS-80 Mod.lil 
TRS-80 Mod.IV 
TRS-80 Mod.IlV 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 


Apply 
Engebras 


“Filcres 


Microdigital 
Microdigital 
Microdigital 
Prologica 
Ritas 

Timex 
Timex 
Dismac 
Dismac 
LNW 

Video Genie 
Digitus 
Digitus 
Kemitron 
Prologica 
Prologica 
Sysdata 
Sysdata 
Multix 
Sysdata 
Codimex 
Dynacom 
LZ 
Microdigital 
Prologica 


Apply 300 
AS41000 
NEZ-8000 
TK-B2C 
TK-83. 
TK-85 
CP-200 
Ringo R-470 
Timex 1000 
Timex 1500 
D-8000 | 
D-8001/2 
LNW-80 
Video Genie | 
DGT100 
DGT-1000 
Naja 800 
CP-300 
CP-500 
Sysdata Ill 
Sysdata Jr. 
MX-Compacto 
Sysdata IV 
CS-6508 
MX-1600 
Color 64 
TKS-800 
CP-400 


Milmar 
Milmar 


“Milmar 


Multix 
Omega 
Polymax 
Polymax 
Prologica 
Prologica 
Prologica 
Prologica 
Ritas 

Sharp 
Spectrum 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Sysdata 
Sysdata 
Sysdata 
Timex 
Timex 
Timex 
Unitron 
Victor do Brasil 
Victor do Brasil 
Video Genie 


Apple ll Plus 
Apple Master 
Apple Senior 
MX-Compacto 
MC-400 

Maxxi 

Poly Plus 
CP-200 

CP-300 

CP-400 

CP.500 

Ringo R-470 
Hotbit HB-8000 
Microengenho | 
Microengenho Il 
Spectrum ed 
Venus ll 

SICI 

Sysdata Ill 
Sysdata IV 
Sysdata Jr. 
Timex 1000 
Timex 1500 
Timex 2000 
APII 

Elppa Il Plus 
Elppa Jr. 

Video Genie! 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

USA 

USA 

Brasil 
Brasil 
Brasil 
USA 


Apple Il + 
Apple ll + 
Apple Il + 
TRS-B0 Mod.IV 
Apple Il + 
Apple Il + 
Apple l+ 
Sinclair ZX-81 
TRS-80 Mod.Ill 
TRS-Color 
TRS-80 Mod.lll 
Sinclair ZX-81 
MSX 

Apple Il+ 
Apple Ile 
Apple l+ 
Apple Il + 
Apple Il + 
TRS-80 Mod. 
TRS-80 Mod.IV 
TRS-80 Mod.lll 
Sinclair ZX-81 
Sinclair ZX-81 


Sinclair Spectrum 


Apple Il + 
Apple Il + 
Apple ll+ 
TRS-80 Mod. | 


EN an Tin macas 
é, UM LOGUTIE SI qi , 


“INPUT foi especialmente projetado para PN 
“ microcomputadores compatíveis com as sete principais Sinclair E TARSO TK:2000 MSX 


“linhas existentes no mercado. 
ba, então emp a sr 


“Os blocos de textos e listagens de programas po pera 
Eme renes E UM [06] Semp e 
; identificados por meio dos seguintes sim os: TRS-Color pune dl 
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INHREENO PRÓXIMO NÚMERO! 


APLICAÇÕES 


Para aperfeiçoar sua datilografia, complete o programa 
do curso e pratique com textos mais longos. 


PROGRAMAÇÃO BASIC 


As funções matemáticas permitem controlar várias operações 
no micro. Recorra a elas para sofisticar seus gráficos. 


PROGRAMAÇÃO DE JOGOS 


Com mais algumas rotinas, a aventura de INPUT ficará 


perfeita. Rode o programa e divirta-se! 





